SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSS YYY YYY SSS LLL 000 000 AAA AAA 
SSS vYY YYY SSS LLL 000 000 AAA ABA 
SSS YYY YYY SSS LLL 000 000 AAA AMA 
SSS yyy yYY SSS LLL 000 000 AAA ABA 
SSS yyy yYY SSS LLL 000 000 AAA AAL 
SSS yyy yYY SSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 A 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS vYY SSS) LLL 000 000 AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSSSSSSSSSSS YYY SSSSSSSSSSSS LLELLLLLLLLLLLLL 000000000 AAA AAR 
SSSSSSSSSSSS vYY SSSSSSSSSSSS LELLLLLLLLLLLLL 000000000 AAA AAA 
SSSSSSSSSSSS yyy SSSSSSSSSSSS LLLLLLLLLLLLLLL 000000000 AAA AAA 
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«NOSHOW CONDITIONALS 
«TITLE ADPSUB750 = ADAPTER SUBROUTINES FOR VAX 11/750 


IDENT ‘'V04-000' 


PARARRARAAASRARRALASALSSALESE ESE LES ESE SEES E SEE EEE ES EEE ESTES ECS CESSES CST ee eas 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL Soe ety _GORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESER 


* 
*® 
® 
® 
® 
THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. * 
* 
THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
CORPORATION. ® 
® 
® 
® 
® 
® 
® 


. . . . . . . . . . . . . . . . . 
epee eee eee eRe Ra RRR RRR 


0 DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 

4 SOFTWARE ON EQUIPMENT WHICH IS MOT SUPPLIED BY DIGITAL. 

° -RRBRRAAAAAARAASAAASASALASSEALASES EAR EEE SERS ERE SERS ESE S EER EERSSLESSSSA LAS OY 
+ Facility: System bootstrapping and initialization 

00 Abstract: This module contains initialization routines that are loaded 

8 during system initialization (rather than Linked into the system). 
GO Environment: Mode = KERNEL, Executing on INTERRUPT stack, IPL=31 


SOONA NEW © OOO NAN WN © OO NAUE WN 0 ODNOAU EWN  O OONOAOU EWN NW ONUN 


SIDED DEDEDE DEDEDE DDE TTI BB BS SB BB WN WIA WII nnonononononon) |] = 
— 


0 
000 
sit Author: Kerbey T. Altmann - Creation date: 30-Oct-1982 
209 Modification history: 
4 v03-007 TCMO002 Trudy C. Matthews 04-Jun-1984 
00 Include more 780-specific code for the 117730" version of 
Bn8 this routine. 
000 v03-006 oP cons Peter Lieberwirth 12-Apr-1984 
B08 t ADPSL_SHB properly again; v03-004 ASSUM d this field 
00 oe y a certain constant offset, and a change to the ADP 
i moved it. Note - this is a 780 change only. 
00 v03-005 poncest Kathleen D. Morse 13-Sep-1983 
09 Create version for Micro-VAX I. 
4 V03-004 ROW0196 Ralph Weber 27-JUL-1983 


0. 
Correct INISMPMADP Se By ADPSL SHB is correctly initialized 
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v04-000 ~$EE 382 Biba :45 SYSLOA.SRCJADPSUB.MAR; 1 "2 dy 
0 ie : to zero. 
74; V03-003 MSHO001 Maryann Hinden 06-Dec-1982 
£ 3 Add initialization for DW750. 
fi : V03-002 ROW0142 Ralph 0. Weber 23-NOV-1982 
8 : Correct JMP in multiport memory interrupt dispatching code 
0 79; prototype, MPMINTD, to a JSB. MASINT expects to receive 
8p 30 ; control via a JSB. 
0 : ; v03-001 TCM0001 Trudy C. Matthews 8-Nov-1982 
8 ? : Initialize field ADPSL_AVECTOR in INISMPMADP. 
00 85 ; 
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C780_LIKE = 0 


LIBRARY CALLS 


SADPDEF 


SUASDEF 


-PSECT SYSLOA,LONG 


Sete Se Se Se Ge Ge Ge Ge Ge Ge Ge Fe Ge Ge Se Fe Se Ge Ge Ge 


SYSLOA. 


47:51 \VAX/VMS Macro Vv04-00 P 
06:45 f SR se 3) 


CJADPSUB.MAR; 1 


Define ADP offsets. 
Define CRB offsets. 
Define AT codes. 
Define DDB offsets. 
Define DDT offsets. 
Define data structure type codes. 
Define interrupt dispatcher offsets. 
Define MASSBUS registers. 
Define machine check masks. 
Define multi-port memory. 
Define nexus device types. 
Define IPR numbers. 

Define Page Table Entry bits. 
Define Restart Parameter Block fields. 
Define axeten service codes. 

UBA register offsets. 

Define UNIBUS interconnect 

register offsets. 
Define unit control block. 
Define virtual address fields. 
Define vec offsets. 


; DEFINE DW750 IPEC REGISTERS 
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8 : -SBTTL CISINT = C1 INTERRUPT HANDLER 
CISINT = CI INTERRUPT HANDLER 
THIS MODULE IS A DUMMY C132 INTERRUPT HANDLER WHICH IS USED 
UNTIL THE REAL CI DRIVER (PADRIVER) IS LOADED. IT ALSO CONTAINS 
$ A DUMMY C132 CONTROLLER INITIALIZATION ENTRY POINT. 
0 INPUTS 


O(SP) ADDRESS OF IDB ADDRESS 
16(SP) SAVED R2 = R5 
sr tees INTERRUPT PC 
4(SP) INTERRUPT PSL 
OUTPUTS: 
NONE 


SIDE EFFECTS: 
INTERRUPTS ARE DISABLED ON THE C132 


: 4(SP) = 


; SPAREGDEF -- Define offsets to CI registers and fields in the registers. 


SDEFINI PAREG 
SDEF PA_CNF .BLKL 1 


VIELD_ PA_CNF,0,<- 
<ADP1YP,8,A>,- 


Configuration register 


Define config register fields: 
Adapter type code 


<PFD,,M>, ; Powerfail disable 

<TDEAD, ,M>,~ : Transmit dead 

<TFAIL,,M>,- 3; Transmit fai 

<,5>,> ; 5 unused bits 

<ERD, ,M>,- ; CRD on port init'd read 
<RDS,,M>,- : RDS on port init'd read 

<CXTER, .M>,- : SBI error confirm 

<RDTO,,M>,- : Port init'd read timeout on SBI 
<CSTMO, ,M>,- ; Port init'd command xmit timeout 
<,1>,- ; 1 unused bit 

<PUP; ,M>, = ; Adapter power up 

<PON. Me ; Adaptor power down 


SDEF PALPMC .BLKL 1 


VIELD PA_PMC,0,<- 
2MIN,,M>,- 
<MTD, M>,- 
<MIE,,M>,- 


Port maint control/status register 


Define register fields: 
Maint initialized 
Maint timer disable 
Maint interrupt enable 
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ze 
ca 


: DRSINT = DR INTERRUPT HANDLER 


HIS MODULE IS A DUMMY 
NTIL THE REAL D 


THE STACK ON ENTRY IS AS FOLLOWS: 

ADDRESS OF IDB ADDRESS 
SAVED R2_ - R5 
INTERRUPT PC 

INTERRUPT PSL 


SIDE EFFECTS: 
INTERRUPTS ARE DISABLED ON THE DR32 


; DR32 DCR REGISTER DEFINITIONS 


<ID2ERR, ,M>,= 


<INTENB, ,A>,= 


<,1>,- 

<PWR/UP, ,M>,=- 
<PWR7DN, .M>,- 
<EXTABT, .M>,- 


9:67:33] AX/VMS Macro V04-00 
SYSLOA.SRCJADPSUB.MAR; 1 
PT HANDLER WHICH IS USED 
IS LOADED. IT ALSO CONTAINS 
ION ENTRY POINT. 


DR32 CONTROL REGISTER 
rg TYPE 
ID ho na STATUS 


VOI IFC Dw 
mZzPrPonomvoc»#m 


o 
- ODDD>r—— ror 


T 
ORT_ INTERRUPT 
NTERRUPT 
R 
ADAPTER POWER UP 
ADAPTER POWER DOWN 
Eeiscusk ABORT 
IMPLEMENTATION DEPENDENT BITS 


; DCR CONTROL FIELD A CODES (USED WHEN WRITING TO DCR) 


DCR_K_CLRPWRUP=*X100 


Page 


04-00 
SUB.MAR; 1 


ro V 
« SRC JADP 


ANDLER 
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FOR 1/550° 1 ~$60=1 38% 00:47:31 AX/VMS Macro V04-00 Page g 
EN DENY AN WIBUS ADAPT 5=SEP=1984 04:06:45 ([SYSLOA.SRCJADPSUB.MAR; 1 (5) 


> 


PTER 0 

NITI ¢ 
45 i .SBTTL UBASINITIAL = CPU-DEPENDENT UNIBUS ADAPTER INITIALIZATION 
4 33 | :UBASINITIAL = UNIBUS ADAPTER INITIALIZATION 
4 41 THIS ROUTINE 1S CALLED VIA A JSB INSTRUCTION AT SYSTEM STARTUP AND AFTER 
4 4¢ : A POWER RECOVERY RESTART TO ALLOW INITIALIZATION OF UNIBUS ADAPTERS. 
4 43; (POWERFAIL AND INITADP) 

045 44 ; 

04) 49 : INPUTS: 

045 23 : R2 = ADDRESS OF ADAPTER CONTROL BLOCK (11/780 AND 11/750) 

04) 48 R4 = ADDRESS OF UNIBUS ADAPTER CONFIGURATION STATUS REGISTER (11/780) 
045 350: ALL INTERRUPTS ARE LOCKED OUT. 

0045 351; 

0062 2¢ : OUTPUTS: 

0045 34 : THE UNIBUS ADAPTER IS INITIALIZED AND INTERRUPTS ARE ENABLED. 

0045 356° 

0045 3? UBASINITIAL:: ;UNIBUS ADAPTER INITIALIZATION 

0045 38 

0045 375 

50 OC A2 3C 0045 376 MOVZWL ADP$W_TR(R2),RO :GET TR NUMBER 
50 09 81 0049 377 CMPW SS o#9,RO :1S THIS FOR ADAPTER AT TR#9? 
06 12 004C 378 BNEQ 10g" [IF NOT, DON'T BOTHER 
50 B2 1000 8F AB O004E 379 BISW §§ #UAS$M_IP_CR1 PIE - 

44 30 @ADP$L_UBASCBF12 (R2) ;SET POWERFAIL INT ENABLE IN IPEC REG 

0054 383 

0054 384 108: :NO SPECIAL INIT FOR 11/730 OR uVAX I 

05 0054 85 RSB ; 

0055 Ha : IGNORE UNEXPECTED UNIBUS INTERRUPTS 

0055 388: 

0095 89 

0055 30 .ALIGN LONG 

0038 3 UBASINTO: : ; PASSIVE RELEASES THROUGH VECTOR 0 

00000000'9F 06 0058 394 INCL  a#10$GL_UBA_INTO : COUNT THEM 
00 11 005 2 BRE UBA_UNERINT ; JOIN COMMON CODE, VECTORS ARE ALLIGNED 

be 3 .ALIGN LONG 

060 399 ; 

O¢0 400 NOTE: UBASUNEXINT is the Label in the EXEC that is a JMP @#UBA_UNEXINT. 
06 401 ; This seeming duplicity is pocesery since there is code that must 
Ded ? gi 3 refer to the EXEC address from within the SYSLOA image. 

ane 404 ipa. UNEXINT: ; UNEXPECTED INTERRUPT CODE 

02 be 414 REI : IGNORE INTERRUPT 
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v04=000 MASSBUS ADAPTER INTERRUPT DISPATCHER -SEP-1984 9 bbi25 SYSLOA.SRCIJADP SUB.MAR; 1 ~ ve 
61 ‘8 ~SBTTL MASSBUS ADAPTER INTERRUPT DISPATCHER 
3 4 o ; MBASINT = MASSBUS ADAPTER INTERRUPT DISPATCHER 
61 4 gi ; THIS ROUTINE IS ENTERED VIA A JSB INSTRUCTION WHEN AN INTERRUPT OCCURS 
2 ? i: ; MASSBUS ADAPTER. THE STATE OF THE STACK ON ENTRY IS 
061 425: 00(SP) = ADDRESS OF IDB ADDRESS. 
0061 4 : : 4 (SP) = SAVED R2. 
0061 4o7 : (SP) = SAVED R3. 
061 4 8 3 12(SP) = SAVED R4. 
0061 429 : 16 (SP) = SAVED RS. 
61 430: : (SP) = INTERRUPT PC. 
0061 4 1: 4(SP) = INTERRUPT PSL. 
9061 638 : INTERRUPT DISPATCHING OCCURS AS FOLLOWS: 
0061 435: IF THE INTERRUPTING ADAPTER IS CURRENTLY OWNED AND THE OWNER UNIT 
0061 436: 1S EXPECTING AN INTERRUPT THEN THAT UNIT IS DISPATCHED FIRST. ALL 
0061 437: OTHER UNITS ARE DISPATCHED BY READING. THE ATTENTION SUMMARY R 
0061 438: ISTER AND SCANNING FOR UNITS THAT HAVE ATTENTION SET. AS EACH UNIT 
0061 439: 1S FOUND, ITS ATTENTION SUMMARY BIT IS CLEARED AND THEN A TEST IS 
0061 440; MADE TO DETERMINE IF AN INTERRUPT IS EXPECTED ON THE UNIT. IF YES, 
0061 441: THEN THE DRIVER IS CALLED TS INTERRUPT RETURN ADDRESS. ELSE 
0061 44g : THE DRIVER IS CALLED AT ITS UNSOLICITED INTERRUPT ADDRESS. AS EACH 
0061 443: CALL TO THE DRIVER RETURNS, THE ATTENTION SUMMARY REGISTER IS RE- 
0061 444: READ AND AN ATTEMPT IS MADE TO FIND ANOTHER UNIT TO DISPATCH. WHEN 
9061 44s ; NO UNITS REQUESTING ATTENTION REMAIN, THE INTERRUPT IS DISMISSED. 
0061 447 
0061 448 .ALIGN LONG 
0064 449 
0064 450 MBASINT:: ;MASSBUS ADAPTER INTERRUPT DISPATCHER 
53 00 BE DO 0064 451 MOVL  a(SP),R3 [GET ADDRESS OF ID 
54 63 00 0068 43¢ MOVL  IDB$L_. tER(R3). RG [GET ADDRESS OF CONFIGURATION STATUS REGISTE 
0068 461 
00800000 8F 03 0068 46¢ BITL WMBASH_ SR_CBHUNG,- 
08 AG 0071 46 MBASL ~SRTR4) sCHECK FOR MBA HUNG 
1 12 0073 464 BNEQ 50S ;BRANCH IF HUNG 
0075 465 
0075 467 
55 04 A3 00 0075 468 MOVL 1DBSL_ OWNER(R3) ,R5 :GET OWNER UNIT UCB ADDRESS 
OA 1 079 469 BEQL 0$ F EQL NER 
52. 0090 ¢5 9A 0078 470 MOVZBL UCB$B_SLAVE(RS) ,R2 q OWNER SLAVE CONTROLLER NUMBER 
2164 A5 01 €0 080 471 BBS #UCBSO INT. ,UCBSW_ STS(RS): SET NTERRUPI EXPECTED 
3 00 BE 00 0 fg 10$:  MOVL acSP),R thetaleve Abbr 
54 63 OD 89 47 OVL  IDBSL_CSR(R3),R4 :RETRIEVE MB FONE 1 CURATION REGISTER ADDRESS 
08 A400 bg 08C 474 MCOML #0, MBASL i iCEEAR ALL BBA STATUS eis 
52 0410 C4 OD 090 475 MOVL = Ase Ast : TREAD ATTENTION SUMMARY REGISTER 
52 52 08 00 EA 009 476 FFS #0,#8->R2, :FIND FIRST UNIT REQUESTING ATTENTION 
A i O9A 47 BNEQ 208 SIF NEQ UNIT FOUND 
; 4 ¢ 9C 478 ADDL #4,SP SREMOVE IDB ADDRESS FROM STACK 
—E 7D OO9F 47 MOVO (SP) +,R2 SRESTORE REGISTERS 
4 8€ 7D 0 Ae 480 MOV  (SP)+.R4 : 
02 O0AS 481 REI : 
Ab 482 
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ALIZATI “SEP=1 4:06:4 SYSLOA.S RCIA ADPSUB.MAR; 1 
= ~SBTTL MASSBUS ADAPTER INITIALIZATION 
; MBASINITIAL = MASSBUS ADAPTER INITIALIZATION 
THIS ROUTINE IS CALLED VIA A JSB INSTRUCTION AT SYSTEM STARTUP AND AFTER 


RO 
ER 
Ha 
F1 § : 
OFY 880 | 
Bor 10 : A POWER RECOVERY RESTART TO ALLOW INITIALIZATION OF MASSBUS ADAPTERS. 
vie ; 
OF i tg : INPUTS: 
OF1 24 
OF1 44 ; R4 = CSR ADDRESS OF MASSBUS ADAPTER. 
OF $i 3 RS = ADDRESS OF ADAPTER IDB. 
ita 23 ; ALL INTERRUPTS ARE LOCKED OUT. 
OOF 1 a78 : 3 
OOF 1 49 ; OUTPUTS: 
OOF 550 : 
OF1 551 ; 
OOF 1 23 ; 
0oF1 55 
OOF 334 MBASINITIAL:: ;MASSBUS ADAPTER INITIALIZATION 
01 pO OOF1 558 MOVL #MBASH_ CR_INIT,- 
04 AG 0OF3 9-559 L7CRTR4) sINITIALIZE MASSBUS ADAPTER 
04 vO O0F5 560 MOVL HASH CR_IE,- 
04 Ad OOF? 561 MBASL~CRTR4S ZENABLE INTERRUPTS 
00F9 564 
05 O00F9 565 RSB 


; THE MASSBUS ADAPTER IS INITIALIZED AND INTERRUPTS ARE ENABLED. 


aprsye 750 = ADAPTER SUBROUTINES FOR VAX 11/75 459° “SEP- 138% 80 Q:47: 51 ayy Macro V04-00 Page 1 
v04-000 INISMPMADP = BUILD ADP AND INITIALIZE ny | “SEP=-1984 04:06:45 (CSYSLOA.SRCJADPSUB.MAR; 1 ( 


4 of -SBTTL INISMPMADP - BUILD ADP AND INITIALIZE MULTI-PORT MEMORY 
FA 69 | : INISMPMADP IS CALLED arse MAPPING THE REGISTERS FOR A MULTI-PORT 
FA 0 ; MEMORY ADAPTER. AN ADAPTER CONTROL BLOCK IS ALLOCATED AND FILLED. 
ao 4 ; THE HARDWARE ADAPTER IS THEN INITIALIZED BY CALLING MPMSINITIAL. 
OFA sg ; NOTE: THIS ROUTINE HAS BEEN LOCATED HERE IN FELONIES EXE INSTEAD OF 
OFA 74 : INILOA.EXE BECAUSE IT CAN BE CALLED WHILE THE SYSTEM 1S RUNNING 
se ie 3 LONG AFTER INILOA.EXE HAS BEEN DELETED! Ti 
OFA BS : INPUT: 
ta oe 3 R4 = nexus identification number of this nexus 
OOFA 0 OUTPUTS: 
OOFA 7 3 ALL REGISTERS PRESERVED 
ee 
00000010 aren 2 ¢ NUMMPMVEC = 16 ; NUMBER OF INTER=PORT INTERRUPT VECTORS 
oor 286 INISMPMADP: : ; INITIALIZE MPM DATA STRUCTURES 
05 OOFA 589 RSB ; DUMMY ENTRY FOR SYSGEN 
OOFB 590 


ADPSUB750 = ADA 
¥04=000 N 
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FOR VAX 11/550 16-SEP- ad ? 0:47:51 VAX/VMS Macro V04-00 Page 1 
ZE MULTI=PORT MEMOR 5<SEP- 4:06:45 (CSYSLOA.SRCJADPSUB.MAR; 1 ( 


~SBTTL MASINITIAL = INITIALIZE MULTI-PORT MEMORY ADAPTER 


3 
6) 


 MPMSINITIAL - INITIALIZE MULTI-PORT MEMORY ADAPTER 
: THIS ROUTINE IS CAL AT pysres INTIALIZATION AND AFTER A POWER 
RECOVERY RESTART TO INITIALIZE THE PORT ADAPTER BY CLEARING ANY 
ERRORS AND ENABLING ALL INTERRUPTS. 
INPUTS: 

R4 = ADDR OF ADAPTER CSR. 

IPL = 31 
OUPUTS: 


ANY ERRORS IN PORT ARE CLEARED AND ALL INTERRUPTS ARE ENABLED. 


Sete Ge Se Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Se Ge Ge Ge 
H + 


MASINITIAL:: ; INTIALIZE PORT 


05 RSB 
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OR VAX 11/950 i ot dat B49 see AX/VMS Pt cro V04-00 
HANDLER ~SEP=1984 04:06:45 (CSYSLOA.S RCIA ADPSUB.MAR; 1 


-SBTTL INTER=PROCESSOR REQUEST HANDLER 


wm 
“nm 


FUNCTIONAL DESCRIPTION: 
is yg is CALLED BY A DRIV 
EITHER SEND A REQUEST TO OR JUST 
THAT IS CONNECTED D TO A PORT OF T 


INPUTS: 


OR AN EXEC FUNCTION TO 
NTERRUPT ANOTHER PROCESSOR 
MULTIPORT MEMORY. 


maw 


Daw 
ums 
uu 


ADAPTER CONTROL BLOCK ADDRESS. 

IF LSS 0 = ADDRESS OF A FORK he TO USE IF REQUEST 
BLOCK IS NOT AVAILA 

IF GEQ 0 - PORT NUMBER OF PROCESSOR TO JUST INTERRUPT. 


OUTPUTS: 


WHEN THIS ROUTINE IS C 


A A FORK BLOCK eeeeet f IT WILL 
ATTEMPT TC et 
B 


OCK. IF THE REQUEST FAILS, 

— SAVED IN THE FORK BLOCK, THE 
D IN THE REQUEST BLOCK WAIT 

"S CALLER IS EXECUTED. 


Ss 
UCCESSFULLY, CONTROL WILL 
TINE CALL SO THE CALLER CAN 


D 
- 
t 


cc 
xmmnmnrm 


T 
QUEUE AND A RETURN TO T ALLE 
If A REQUEST BLOCK IS ALLOCATED S 
RETURN TO THE CALLER VIA A CO=ROU 
FILL-IN THE REQUEST BLOCK. 


THE CALLER WILL THEN ‘ete ANOTHER CO~ROUTINE CALL TO RETURN 
TO THIS ROUTINE SO THE BLOCK CAN BE INSERTED ale isha ED 


I 
FIRST REQUEST HE QU LL 
ALSO BE REQUESTED TO WAKE-UP THE DISPATCHER ON THE PORT. 


IF E H A PORT NUMBER INSTEAD OF A 

FORK BLOCK ADDRESS, IT W UST REQUEST AN INTERRUPT FOR 

THE PROCESSOR ON THE SPE D PORT. IT IS THEN UP TO THE 
ion” 0 RMINE WHAT THE INTERRUPT WAS 
RO = SUCCESS OR FAILURE OF OPERATION. THIS SHOULD BE CHECKED 
BY THE CALLER BOTH TIMES THIS ROUTINE RETURNS. 


R3,R4,R5 ARE PRESERVED. 


MASREQUEST: : ; REQUEST HANDLER 
RSB 


A psuB750 - ADAPTER SUBROUTINES FOR VAX 11/750 1 =SEP-1984 0:47:51 VAX/ Vis Macro V04-00 Page 15 
v04-000 REPORT RESOURCE AVAILABILITY TO INTEREST 5=SEP=1984 04:06:45 [CSYSLOA.SRCJADPSUB.MAR; 1 (6) 
oF i .SBTTL REPORT RESOURCE AVAILABILITY TO INTERESTED PORTS 
FD «B49: 
ED 30 t FUNCTIONAL DESCRIPTION: 
FD 7 : THIS ROUTINE IS CALLED TO REPORT TO ANY PROCESSORS THAT A RESOURCE 
OoFD 23 HAS BEEN MADE AVAIL TABLE. 
Sor 33 3 INPUTS: 
OFD 2$ : RO = RESOURCE NUMBER OF RESOURCE MADE AVAILABLE. 
OFD 28 ; R1 = SHARED MEMORY CONTROL BLOCK (SHB) ADDRESS. 
OOFD 60 : OUTPUTS: 
OOFD 64 : ANY PROCESSORS WAITING FOR THE SPECIFIED RESOURCE ARE INTERRUPTED 
OFD 863 : TO NOTIFY THEM THE RESOURCE IS AVAILABLE. 
OOFD Seg : RO,R1,R2,R3 ARE NOT PRESERVED. 
OorD Ber 
OOFD 868 MASRAVAIL:: 
OOFD 869 
05 OOFD 871 RSB 
OOFE 872 
OOFE 117 END 


15 
ADPSUB750 = ADAPTER SUBROUTINES FOR VAX 11/450 at at B08 2] ey Macro V04-00 
Symbol table SEP=1984 04:06:45 [CSYSLOA.SRCJADPSUB.MAR; 1 


ADPS$L_UBASCB = 00000044 
ADPSU-TR = $o00000¢ 
BUGS _ABACBHUNG aeeeeere = X 02 
C LIK = 00 8 00 
CISINITIAL 1F RG 0 
CISINT 00 RG 8 
CISSHUTDOWN 1F RG 
CPU_TYPE = 
DCR_K_CLRPWRDN = 3 3 
DCR_K_CLRPWRUP = 
DCR-K_RESET = 00004000 
DDTSL_UNSOL INT = 3808 oe 
DRSINITIAL F RG 0 
DRSINT 00000 ¢ RG 0 
DRSSHUTDOWN 88088 F RG 0 
R_DCR 0000000 
IDBS$L_ADP = 00000014 
IDBSL_CSR = 44 
IDBSL_OWNER = 00000004 
IDB$L_UCBLST = 00000018 
INISMPMADP QOOOOOFA RG Og 
10$GL_UBA_INTO teeeeere =X 0 
MASINTTIAC QOOOO0FB RG 02 
MASRAVAIL QOOOOOFD RG bs 
MASREQUEST QOOOOOFC RG 0 
MBASINITIAL QOOO000F1 RG 85 
ASINT 00000064 RG 0 
MBASL_AS = 00000410 
MBASL_CR = 00000004 
MBASL_CSR = 00000000 
MBASL_DR = 00000014 
$L_SR = 44 444 44 
MBASM_CR_IE = 00000004 
MBASM_CR_INIT = 00000001 
MBASM_ SR- CBHUNG = aaa 
NUMMPAVET = 00000010 
NF ai 44 444 
PA_CNF_M_PDN = 00800000 
PA_CNF_M_PUP = 00400000 
A-PMC_M_MIN 99000001 
= 
RS_SIB_TyP730 = 09000 33 
PR$_SID_TYP7 = 000000 
PR$_SID_TYP7 = 0008 1 
PRS$_SID_TYP7 = 4 
PR$_SID_TYPUV1 = 0008 7 
0 ye = 0000000 
UASSM_IP_CR1_PIE = ed 0 
UBASIRITTAL 0000045 RG 0 
UBASINTO “ 209 5 3 
UCBSB_SLAVE $0 ; 
i 
0 
64 
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Psect synopsis =SEP=1984 04:06:4 SYSLOA.SRCJ ADPSUB.. MAR; 1 (6) 


PSECT name Allocation PSECT No. Attributes 
ABS HA 00008 ( a: 0 ¢ 0.) NOPIC USR CON ASS LCL pet Hs NOE XE me woe NOVEC BYTE 
ABS$ 000008 (¢ ‘ 1 ¢( 1.) NOPIC USR CON ABS LCL NOSHR- EXE T NOVEC BYTE 
SYSLOA QOOOOFE ¢ 254.) 2¢( 2.) NOPIC USR CON REL LCL NOSHR-~ EXE RD URT NOVEC LONG 


Phase Page faults CPU Time Elapsed Time 
Initialization 30 00:00:00.05 eS EH 
ponnese processing 106 00:00:00.45 0:00:03.30 
s 1 501 00:00:1 te ee es SC 
ee table sort 00:00:02.0 00:00:09.1 
Pass 2 115 00:00:0 a4) 00:00:13.78 
Symbol table output 7 00:00:00.0 00:00:00.69 
Psect synopsis output 2 00:00:00.01 00:00:00.01 
Cross-reference output 0 ea a oe 00:00:00.00 
Assembler run totals 769 60:00:18.1 00:01:16.83 


The working set_Limit was 1800 pages. 

120628 bytes (236 pages) of virtual memory were used to buffer the intermediate code. 

There were 110 pages of symbol table space allocated to hold 1977 non-local and 6 local symbols. 
1179 source Lines were read in Pass 1, "aethne dy 13 object records in Pass 2 

32 pages of virtual memory were used to define 31 macros. 


Sweeter ee mee eee meme ase n rece a} 


Macro Library name Macros defined 
-$255$DUA28:CSYS.OBJJLIB.MLB; 1 19 
“$255$DUA28:(SYSLIBISTARLET.MLB;2 7 

TOTALS (all Libraries) 26 


2031 GETS were required to define 26 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:ADPSUB750/0BJ=0BJ$:ADPSUB750 MSRC$:CPUSW750/UPDATE=(ENH$: CPUSW750) +MSRC$: ADPSUB/UPDATE=(ENHS$: ADPSUB) +E XECMLS$/LIB 
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